home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / livecd.squashfs / usr / share / pygtk / 2.0 / defs / pango.defs < prev   
Text File  |  2006-01-20  |  39KB  |  1,881 lines

  1. ;; -*- scheme -*-
  2.  
  3. (include "pango-types.defs")
  4.  
  5. ;; From /opt/gtk2/include/pango-1.0/pango/pango-attributes.h
  6.  
  7. (define-function pango_color_get_type
  8.   (c-name "pango_color_get_type")
  9.   (return-type "GType")
  10. )
  11.  
  12. (define-method copy
  13.   (of-object "PangoColor")
  14.   (c-name "pango_color_copy")
  15.   (return-type "PangoColor*")
  16. )
  17.  
  18. (define-method free
  19.   (of-object "PangoColor")
  20.   (c-name "pango_color_free")
  21.   (return-type "none")
  22. )
  23.  
  24. (define-function pango_color_parse
  25.   (c-name "pango_color_parse")
  26.   (is-constructor-of "PangoColor")
  27.   (return-type "gboolean")
  28.   (parameters
  29.     '("const-char*" "spec")
  30.   )
  31. )
  32.  
  33. (define-function pango_attr_type_register
  34.   (c-name "pango_attr_type_register")
  35.   (return-type "PangoAttrType")
  36.   (parameters
  37.     '("const-gchar*" "name")
  38.   )
  39. )
  40.  
  41. (define-method copy
  42.   (of-object "PangoAttribute")
  43.   (c-name "pango_attribute_copy")
  44.   (return-type "PangoAttribute*")
  45. )
  46.  
  47. (define-method destroy
  48.   (of-object "PangoAttribute")
  49.   (c-name "pango_attribute_destroy")
  50.   (return-type "none")
  51. )
  52.  
  53. (define-method equal
  54.   (of-object "PangoAttribute")
  55.   (c-name "pango_attribute_equal")
  56.   (return-type "gboolean")
  57.   (parameters
  58.     '("const-PangoAttribute*" "attr2")
  59.   )
  60. )
  61.  
  62. (define-function AttrLanguage
  63.   (c-name "pango_attr_language_new")
  64.   (return-type "PangoAttribute*")
  65.   (parameters
  66.     '("PangoLanguage*" "language")
  67.   )
  68. )
  69.  
  70. (define-function AttrFamily
  71.   (c-name "pango_attr_family_new")
  72.   (return-type "PangoAttribute*")
  73.   (parameters
  74.     '("const-char*" "family")
  75.   )
  76. )
  77.  
  78. (define-function AttrForeground
  79.   (c-name "pango_attr_foreground_new")
  80.   (return-type "PangoAttribute*")
  81.   (parameters
  82.     '("guint16" "red")
  83.     '("guint16" "green")
  84.     '("guint16" "blue")
  85.   )
  86. )
  87.  
  88. (define-function AttrBackground
  89.   (c-name "pango_attr_background_new")
  90.   (return-type "PangoAttribute*")
  91.   (parameters
  92.     '("guint16" "red")
  93.     '("guint16" "green")
  94.     '("guint16" "blue")
  95.   )
  96. )
  97.  
  98. (define-function AttrSize
  99.   (c-name "pango_attr_size_new")
  100.   (return-type "PangoAttribute*")
  101.   (parameters
  102.     '("int" "size")
  103.   )
  104. )
  105.  
  106. (define-function AttrStyle
  107.   (c-name "pango_attr_style_new")
  108.   (return-type "PangoAttribute*")
  109.   (parameters
  110.     '("PangoStyle" "style")
  111.   )
  112. )
  113.  
  114. (define-function AttrWeight
  115.   (c-name "pango_attr_weight_new")
  116.   (return-type "PangoAttribute*")
  117.   (parameters
  118.     '("PangoWeight" "weight")
  119.   )
  120. )
  121.  
  122. (define-function AttrVariant
  123.   (c-name "pango_attr_variant_new")
  124.   (return-type "PangoAttribute*")
  125.   (parameters
  126.     '("PangoVariant" "variant")
  127.   )
  128. )
  129.  
  130. (define-function AttrStretch
  131.   (c-name "pango_attr_stretch_new")
  132.   (return-type "PangoAttribute*")
  133.   (parameters
  134.     '("PangoStretch" "stretch")
  135.   )
  136. )
  137.  
  138. (define-function AttrFontDesc
  139.   (c-name "pango_attr_font_desc_new")
  140.   (return-type "PangoAttribute*")
  141.   (parameters
  142.     '("const-PangoFontDescription*" "desc")
  143.   )
  144. )
  145.  
  146. (define-function AttrUnderline
  147.   (c-name "pango_attr_underline_new")
  148.   (return-type "PangoAttribute*")
  149.   (parameters
  150.     '("PangoUnderline" "underline")
  151.   )
  152. )
  153.  
  154. (define-function AttrStrikethrough
  155.   (c-name "pango_attr_strikethrough_new")
  156.   (return-type "PangoAttribute*")
  157.   (parameters
  158.     '("gboolean" "strikethrough")
  159.   )
  160. )
  161.  
  162. (define-function AttrRise
  163.   (c-name "pango_attr_rise_new")
  164.   (return-type "PangoAttribute*")
  165.   (parameters
  166.     '("int" "rise")
  167.   )
  168. )
  169.  
  170. (define-function AttrShape
  171.   (c-name "pango_attr_shape_new")
  172.   (return-type "PangoAttribute*")
  173.   (parameters
  174.     '("const-PangoRectangle*" "ink_rect")
  175.     '("const-PangoRectangle*" "logical_rect")
  176.   )
  177. )
  178.  
  179. (define-function AttrScale
  180.   (c-name "pango_attr_scale_new")
  181.   (return-type "PangoAttribute*")
  182.   (parameters
  183.     '("double" "scale_factor")
  184.   )
  185. )
  186.  
  187. (define-function AttrFallback
  188.   (c-name "pango_attr_fallback_new")
  189.   (return-type "PangoAttribute*")
  190.   (parameters
  191.     '("gboolean" "fallback")
  192.   )
  193. )
  194.  
  195. (define-function pango_attr_list_get_type
  196.   (c-name "pango_attr_list_get_type")
  197.   (return-type "GType")
  198. )
  199.  
  200. (define-function pango_attr_list_new
  201.   (c-name "pango_attr_list_new")
  202.   (return-type "PangoAttrList*")
  203.   (is-constructor-of "PangoAttrList")
  204. )
  205.  
  206. (define-method ref
  207.   (of-object "PangoAttrList")
  208.   (c-name "pango_attr_list_ref")
  209.   (return-type "none")
  210. )
  211.  
  212. (define-method unref
  213.   (of-object "PangoAttrList")
  214.   (c-name "pango_attr_list_unref")
  215.   (return-type "none")
  216. )
  217.  
  218. (define-method copy
  219.   (of-object "PangoAttrList")
  220.   (c-name "pango_attr_list_copy")
  221.   (return-type "PangoAttrList*")
  222. )
  223.  
  224. (define-method insert
  225.   (of-object "PangoAttrList")
  226.   (c-name "pango_attr_list_insert")
  227.   (return-type "none")
  228.   (parameters
  229.     '("PangoAttribute*" "attr")
  230.   )
  231. )
  232.  
  233. (define-method insert_before
  234.   (of-object "PangoAttrList")
  235.   (c-name "pango_attr_list_insert_before")
  236.   (return-type "none")
  237.   (parameters
  238.     '("PangoAttribute*" "attr")
  239.   )
  240. )
  241.  
  242. (define-method change
  243.   (of-object "PangoAttrList")
  244.   (c-name "pango_attr_list_change")
  245.   (return-type "none")
  246.   (parameters
  247.     '("PangoAttribute*" "attr")
  248.   )
  249. )
  250.  
  251. (define-method splice
  252.   (of-object "PangoAttrList")
  253.   (c-name "pango_attr_list_splice")
  254.   (return-type "none")
  255.   (parameters
  256.     '("PangoAttrList*" "other")
  257.     '("gint" "pos")
  258.     '("gint" "len")
  259.   )
  260. )
  261.  
  262. (define-method get_iterator
  263.   (of-object "PangoAttrList")
  264.   (c-name "pango_attr_list_get_iterator")
  265.   (return-type "PangoAttrIterator*")
  266. )
  267.  
  268. (define-method filter
  269.   (of-object "PangoAttrList")
  270.   (c-name "pango_attr_list_filter")
  271.   (return-type "PangoAttrList*")
  272.   (parameters
  273.     '("PangoAttrFilterFunc" "func")
  274.     '("gpointer" "data")
  275.   )
  276. )
  277.  
  278. (define-method range
  279.   (of-object "PangoAttrIterator")
  280.   (c-name "pango_attr_iterator_range")
  281.   (return-type "none")
  282.   (parameters
  283.     '("gint*" "start")
  284.     '("gint*" "end")
  285.   )
  286. )
  287.  
  288. (define-method next
  289.   (of-object "PangoAttrIterator")
  290.   (c-name "pango_attr_iterator_next")
  291.   (return-type "gboolean")
  292. )
  293.  
  294. (define-method copy
  295.   (of-object "PangoAttrIterator")
  296.   (c-name "pango_attr_iterator_copy")
  297.   (return-type "PangoAttrIterator*")
  298. )
  299.  
  300. (define-method destroy
  301.   (of-object "PangoAttrIterator")
  302.   (c-name "pango_attr_iterator_destroy")
  303.   (return-type "none")
  304. )
  305.  
  306. (define-method get
  307.   (of-object "PangoAttrIterator")
  308.   (c-name "pango_attr_iterator_get")
  309.   (return-type "PangoAttribute*")
  310.   (parameters
  311.     '("PangoAttrType" "type")
  312.   )
  313. )
  314.  
  315. (define-method get_font
  316.   (of-object "PangoAttrIterator")
  317.   (c-name "pango_attr_iterator_get_font")
  318.   (return-type "none")
  319.   (parameters
  320.     '("PangoFontDescription*" "desc")
  321.     '("PangoLanguage**" "language")
  322.     '("GSList**" "extra_attrs")
  323.   )
  324. )
  325.  
  326. (define-method get_attrs
  327.   (of-object "PangoAttrIterator")
  328.   (c-name "pango_attr_iterator_get_attrs")
  329.   (return-type "GSList*")
  330. )
  331.  
  332. (define-function parse_markup
  333.   (c-name "pango_parse_markup")
  334.   (return-type "gboolean")
  335.   (parameters
  336.     '("const-char*" "markup_text")
  337.     '("int" "length")
  338.     '("gunichar" "accel_marker")
  339.     '("PangoAttrList**" "attr_list")
  340.     '("char**" "text")
  341.     '("gunichar*" "accel_char")
  342.     '("GError**" "error")
  343.   )
  344. )
  345.  
  346.  
  347.  
  348. ;; From /opt/gtk2/include/pango-1.0/pango/pango-break.h
  349.  
  350. (define-function break
  351.   (c-name "pango_break")
  352.   (return-type "none")
  353.   (parameters
  354.     '("const-gchar*" "text")
  355.     '("gint" "length")
  356.     '("PangoAnalysis*" "analysis")
  357.     '("PangoLogAttr*" "attrs")
  358.   )
  359. )
  360.  
  361. (define-function find_paragraph_boundary
  362.   (c-name "pango_find_paragraph_boundary")
  363.   (return-type "none")
  364.   (parameters
  365.     '("const-gchar*" "text")
  366.     '("gint" "length")
  367.     '("gint*" "paragraph_delimiter_index")
  368.     '("gint*" "next_paragraph_start")
  369.   )
  370. )
  371.  
  372. (define-function get_log_attrs
  373.   (c-name "pango_get_log_attrs")
  374.   (return-type "none")
  375.   (parameters
  376.     '("const-char*" "text")
  377.     '("int" "length")
  378.     '("int" "level")
  379.     '("PangoLanguage*" "language")
  380.     '("PangoLogAttr*" "log_attrs")
  381.   )
  382. )
  383.  
  384.  
  385.  
  386. ;; From /opt/gtk2/include/pango-1.0/pango/pango-context.h
  387.  
  388. (define-function pango_context_new
  389.   (c-name "pango_context_new")
  390.   (return-type "PangoContext*")
  391.   (is-constructor-of "PangoContext")
  392. )
  393.  
  394. (define-method add_font_map
  395.   (of-object "PangoContext")
  396.   (c-name "pango_context_set_font_map")
  397.   (return-type "none")
  398.   (parameters
  399.     '("PangoFontMap*" "font_map")
  400.   )
  401. )
  402.  
  403. (define-method list_families
  404.   (of-object "PangoContext")
  405.   (c-name "pango_context_list_families")
  406.   (return-type "none")
  407.   (parameters
  408.     '("PangoFontFamily***" "families")
  409.     '("int*" "n_families")
  410.   )
  411. )
  412.  
  413. (define-method load_font
  414.   (of-object "PangoContext")
  415.   (c-name "pango_context_load_font")
  416.   (return-type "PangoFont*")
  417.   (parameters
  418.     '("const-PangoFontDescription*" "desc")
  419.   )
  420. )
  421.  
  422. (define-method load_fontset
  423.   (of-object "PangoContext")
  424.   (c-name "pango_context_load_fontset")
  425.   (return-type "PangoFontset*")
  426.   (parameters
  427.     '("const-PangoFontDescription*" "desc")
  428.     '("PangoLanguage*" "language")
  429.   )
  430. )
  431.  
  432. (define-method get_metrics
  433.   (of-object "PangoContext")
  434.   (c-name "pango_context_get_metrics")
  435.   (return-type "PangoFontMetrics*")
  436.   (caller-owns-return #t)
  437.   (parameters
  438.     '("const-PangoFontDescription*" "desc")
  439.     '("PangoLanguage*" "language" (null-ok) (default "NULL"))
  440.   )
  441. )
  442.  
  443. (define-method set_font_description
  444.   (of-object "PangoContext")
  445.   (c-name "pango_context_set_font_description")
  446.   (return-type "none")
  447.   (parameters
  448.     '("const-PangoFontDescription*" "desc")
  449.   )
  450. )
  451.  
  452. (define-method get_font_description
  453.   (of-object "PangoContext")
  454.   (c-name "pango_context_get_font_description")
  455.   (return-type "PangoFontDescription*")
  456. )
  457.  
  458. (define-method get_language
  459.   (of-object "PangoContext")
  460.   (c-name "pango_context_get_language")
  461.   (return-type "PangoLanguage*")
  462. )
  463.  
  464. (define-method set_language
  465.   (of-object "PangoContext")
  466.   (c-name "pango_context_set_language")
  467.   (return-type "none")
  468.   (parameters
  469.     '("PangoLanguage*" "language")
  470.   )
  471. )
  472.  
  473. (define-method set_base_dir
  474.   (of-object "PangoContext")
  475.   (c-name "pango_context_set_base_dir")
  476.   (return-type "none")
  477.   (parameters
  478.     '("PangoDirection" "direction")
  479.   )
  480. )
  481.  
  482. (define-method get_base_dir
  483.   (of-object "PangoContext")
  484.   (c-name "pango_context_get_base_dir")
  485.   (return-type "PangoDirection")
  486. )
  487.  
  488. (define-function itemize
  489.   (c-name "pango_itemize")
  490.   (return-type "GList*")
  491.   (parameters
  492.     '("PangoContext*" "context")
  493.     '("const-char*" "text")
  494.     '("int" "start_index")
  495.     '("int" "length")
  496.     '("PangoAttrList*" "attrs")
  497.     '("PangoAttrIterator*" "cached_iter" (null-ok) (default "NULL"))
  498.   )
  499. )
  500.  
  501.  
  502.  
  503. ;; From /opt/gtk2/include/pango-1.0/pango/pango-coverage.h
  504.  
  505. (define-method ref
  506.   (of-object "PangoCoverage")
  507.   (c-name "pango_coverage_ref")
  508.   (return-type "PangoCoverage*")
  509. )
  510.  
  511. (define-method unref
  512.   (of-object "PangoCoverage")
  513.   (c-name "pango_coverage_unref")
  514.   (return-type "none")
  515. )
  516.  
  517. (define-method copy
  518.   (of-object "PangoCoverage")
  519.   (c-name "pango_coverage_copy")
  520.   (return-type "PangoCoverage*")
  521. )
  522.  
  523. (define-method get
  524.   (of-object "PangoCoverage")
  525.   (c-name "pango_coverage_get")
  526.   (return-type "PangoCoverageLevel")
  527.   (parameters
  528.     '("int" "index")
  529.   )
  530. )
  531.  
  532. (define-method set
  533.   (of-object "PangoCoverage")
  534.   (c-name "pango_coverage_set")
  535.   (return-type "none")
  536.   (parameters
  537.     '("int" "index")
  538.     '("PangoCoverageLevel" "level")
  539.   )
  540. )
  541.  
  542. (define-method max
  543.   (of-object "PangoCoverage")
  544.   (c-name "pango_coverage_max")
  545.   (return-type "none")
  546.   (parameters
  547.     '("PangoCoverage*" "other")
  548.   )
  549. )
  550.  
  551. (define-method to_bytes
  552.   (of-object "PangoCoverage")
  553.   (c-name "pango_coverage_to_bytes")
  554.   (return-type "none")
  555.   (parameters
  556.     '("guchar**" "bytes")
  557.     '("int*" "n_bytes")
  558.   )
  559. )
  560.  
  561. (define-function coverage_from_bytes
  562.   (c-name "pango_coverage_from_bytes")
  563.   (is-constructor-of "PangoCoverage")
  564.   (return-type "PangoCoverage*")
  565.   (parameters
  566.     '("guchar*" "bytes")
  567.     '("int" "n_bytes")
  568.   )
  569. )
  570.  
  571.  
  572.  
  573. ;; From /opt/gtk2/include/pango-1.0/pango/pango-font.h
  574.  
  575. (define-function pango_font_description_new
  576.   (c-name "pango_font_description_new")
  577.   (is-constructor-of "PangoFontDescription")
  578.   (return-type "PangoFontDescription*")
  579. )
  580.  
  581. (define-method copy
  582.   (of-object "PangoFontDescription")
  583.   (c-name "pango_font_description_copy")
  584.   (return-type "PangoFontDescription*")
  585. )
  586.  
  587. (define-method copy_static
  588.   (of-object "PangoFontDescription")
  589.   (c-name "pango_font_description_copy_static")
  590.   (return-type "PangoFontDescription*")
  591. )
  592.  
  593. (define-method hash
  594.   (of-object "PangoFontDescription")
  595.   (c-name "pango_font_description_hash")
  596.   (return-type "guint")
  597. )
  598.  
  599. (define-method equal
  600.   (of-object "PangoFontDescription")
  601.   (c-name "pango_font_description_equal")
  602.   (return-type "gboolean")
  603.   (parameters
  604.     '("const-PangoFontDescription*" "desc2")
  605.   )
  606. )
  607.  
  608. (define-method free
  609.   (of-object "PangoFontDescription")
  610.   (c-name "pango_font_description_free")
  611.   (return-type "none")
  612. )
  613.  
  614. (define-function pango_font_descriptions_free
  615.   (c-name "pango_font_descriptions_free")
  616.   (return-type "none")
  617.   (parameters
  618.     '("PangoFontDescription**" "descs")
  619.     '("int" "n_descs")
  620.   )
  621. )
  622.  
  623. (define-method set_family
  624.   (of-object "PangoFontDescription")
  625.   (c-name "pango_font_description_set_family")
  626.   (return-type "none")
  627.   (parameters
  628.     '("const-char*" "family")
  629.   )
  630. )
  631.  
  632. (define-method set_family_static
  633.   (of-object "PangoFontDescription")
  634.   (c-name "pango_font_description_set_family_static")
  635.   (return-type "none")
  636.   (parameters
  637.     '("const-char*" "family")
  638.   )
  639. )
  640.  
  641. (define-method get_family
  642.   (of-object "PangoFontDescription")
  643.   (c-name "pango_font_description_get_family")
  644.   (return-type "const-char*")
  645. )
  646.  
  647. (define-method set_style
  648.   (of-object "PangoFontDescription")
  649.   (c-name "pango_font_description_set_style")
  650.   (return-type "none")
  651.   (parameters
  652.     '("PangoStyle" "style")
  653.   )
  654. )
  655.  
  656. (define-method get_style
  657.   (of-object "PangoFontDescription")
  658.   (c-name "pango_font_description_get_style")
  659.   (return-type "PangoStyle")
  660. )
  661.  
  662. (define-method set_variant
  663.   (of-object "PangoFontDescription")
  664.   (c-name "pango_font_description_set_variant")
  665.   (return-type "none")
  666.   (parameters
  667.     '("PangoVariant" "variant")
  668.   )
  669. )
  670.  
  671. (define-method get_variant
  672.   (of-object "PangoFontDescription")
  673.   (c-name "pango_font_description_get_variant")
  674.   (return-type "PangoVariant")
  675. )
  676.  
  677. (define-method set_weight
  678.   (of-object "PangoFontDescription")
  679.   (c-name "pango_font_description_set_weight")
  680.   (return-type "none")
  681.   (parameters
  682.     '("PangoWeight" "weight")
  683.   )
  684. )
  685.  
  686. (define-method get_weight
  687.   (of-object "PangoFontDescription")
  688.   (c-name "pango_font_description_get_weight")
  689.   (return-type "PangoWeight")
  690. )
  691.  
  692. (define-method set_stretch
  693.   (of-object "PangoFontDescription")
  694.   (c-name "pango_font_description_set_stretch")
  695.   (return-type "none")
  696.   (parameters
  697.     '("PangoStretch" "stretch")
  698.   )
  699. )
  700.  
  701. (define-method get_stretch
  702.   (of-object "PangoFontDescription")
  703.   (c-name "pango_font_description_get_stretch")
  704.   (return-type "PangoStretch")
  705. )
  706.  
  707. (define-method set_size
  708.   (of-object "PangoFontDescription")
  709.   (c-name "pango_font_description_set_size")
  710.   (return-type "none")
  711.   (parameters
  712.     '("gint" "size")
  713.   )
  714. )
  715.  
  716. (define-method get_size
  717.   (of-object "PangoFontDescription")
  718.   (c-name "pango_font_description_get_size")
  719.   (return-type "gint")
  720. )
  721.  
  722. (define-method get_set_fields
  723.   (of-object "PangoFontDescription")
  724.   (c-name "pango_font_description_get_set_fields")
  725.   (return-type "PangoFontMask")
  726. )
  727.  
  728. (define-method unset_fields
  729.   (of-object "PangoFontDescription")
  730.   (c-name "pango_font_description_unset_fields")
  731.   (return-type "none")
  732.   (parameters
  733.     '("PangoFontMask" "to_unset")
  734.   )
  735. )
  736.  
  737. (define-method merge
  738.   (of-object "PangoFontDescription")
  739.   (c-name "pango_font_description_merge")
  740.   (return-type "none")
  741.   (parameters
  742.     '("const-PangoFontDescription*" "desc_to_merge")
  743.     '("gboolean" "replace_existing")
  744.   )
  745. )
  746.  
  747. (define-method merge_static
  748.   (of-object "PangoFontDescription")
  749.   (c-name "pango_font_description_merge_static")
  750.   (return-type "none")
  751.   (parameters
  752.     '("const-PangoFontDescription*" "desc_to_merge")
  753.     '("gboolean" "replace_existing")
  754.   )
  755. )
  756.  
  757. (define-method better_match
  758.   (of-object "PangoFontDescription")
  759.   (c-name "pango_font_description_better_match")
  760.   (return-type "gboolean")
  761.   (parameters
  762.     '("const-PangoFontDescription*" "old_match" (null-ok) (default "NULL"))
  763.     '("const-PangoFontDescription*" "new_match")
  764.   )
  765. )
  766.  
  767. (define-function pango_font_description_from_string
  768.   (c-name "pango_font_description_from_string")
  769.   (is-constructor-of "PangoFontDescription")
  770.   (return-type "PangoFontDescription*")
  771.   (parameters
  772.     '("const-char*" "str")
  773.   )
  774. )
  775.  
  776. (define-method to_string
  777.   (of-object "PangoFontDescription")
  778.   (c-name "pango_font_description_to_string")
  779.   (return-type "char*")
  780. )
  781.  
  782. (define-method to_filename
  783.   (of-object "PangoFontDescription")
  784.   (c-name "pango_font_description_to_filename")
  785.   (return-type "char*")
  786. )
  787.  
  788. (define-function pango_font_metrics_get_type
  789.   (c-name "pango_font_metrics_get_type")
  790.   (return-type "GType")
  791. )
  792.  
  793. (define-method ref
  794.   (of-object "PangoFontMetrics")
  795.   (c-name "pango_font_metrics_ref")
  796.   (return-type "PangoFontMetrics*")
  797. )
  798.  
  799. (define-method unref
  800.   (of-object "PangoFontMetrics")
  801.   (c-name "pango_font_metrics_unref")
  802.   (return-type "none")
  803. )
  804.  
  805. (define-method get_ascent
  806.   (of-object "PangoFontMetrics")
  807.   (c-name "pango_font_metrics_get_ascent")
  808.   (return-type "int")
  809. )
  810.  
  811. (define-method get_descent
  812.   (of-object "PangoFontMetrics")
  813.   (c-name "pango_font_metrics_get_descent")
  814.   (return-type "int")
  815. )
  816.  
  817. (define-method get_approximate_char_width
  818.   (of-object "PangoFontMetrics")
  819.   (c-name "pango_font_metrics_get_approximate_char_width")
  820.   (return-type "int")
  821. )
  822.  
  823. (define-method get_approximate_digit_width
  824.   (of-object "PangoFontMetrics")
  825.   (c-name "pango_font_metrics_get_approximate_digit_width")
  826.   (return-type "int")
  827. )
  828.  
  829. ; (define-function pango_font_metrics_new
  830. ;   (c-name "pango_font_metrics_new")
  831. ;   (is-constructor-of "PangoFontMetrics")
  832. ;   (return-type "PangoFontMetrics*")
  833. ; )
  834.  
  835. (define-function pango_font_family_get_type
  836.   (c-name "pango_font_family_get_type")
  837.   (return-type "GType")
  838. )
  839.  
  840. (define-method list_faces
  841.   (of-object "PangoFontFamily")
  842.   (c-name "pango_font_family_list_faces")
  843.   (return-type "none")
  844.   (parameters
  845.     '("PangoFontFace***" "faces")
  846.     '("int*" "n_faces")
  847.   )
  848. )
  849.  
  850. (define-method get_name
  851.   (of-object "PangoFontFamily")
  852.   (c-name "pango_font_family_get_name")
  853.   (return-type "const-char*")
  854. )
  855.  
  856. (define-method is_monospace
  857.   (of-object "PangoFontFamily")
  858.   (c-name "pango_font_family_is_monospace")
  859.   (return-type "gboolean")
  860. )
  861.  
  862. (define-function pango_font_face_get_type
  863.   (c-name "pango_font_face_get_type")
  864.   (return-type "GType")
  865. )
  866.  
  867. (define-method describe
  868.   (of-object "PangoFontFace")
  869.   (c-name "pango_font_face_describe")
  870.   (return-type "PangoFontDescription*")
  871. )
  872.  
  873. (define-method get_face_name
  874.   (of-object "PangoFontFace")
  875.   (c-name "pango_font_face_get_face_name")
  876.   (return-type "const-char*")
  877. )
  878.  
  879. (define-method list_sizes
  880.   (of-object "PangoFontFace")
  881.   (c-name "pango_font_face_list_sizes")
  882.   (return-type "none")
  883.   (parameters
  884.     '("int**" "sizes")
  885.     '("int*" "n_sizes")
  886.   )
  887. )
  888.  
  889. (define-function pango_font_get_type
  890.   (c-name "pango_font_get_type")
  891.   (return-type "GType")
  892. )
  893.  
  894. (define-method describe
  895.   (of-object "PangoFont")
  896.   (c-name "pango_font_describe")
  897.   (return-type "PangoFontDescription*")
  898. )
  899.  
  900. (define-method get_coverage
  901.   (of-object "PangoFont")
  902.   (c-name "pango_font_get_coverage")
  903.   (return-type "PangoCoverage*")
  904.   (parameters
  905.     '("PangoLanguage*" "language")
  906.   )
  907. )
  908.  
  909. (define-method find_shaper
  910.   (of-object "PangoFont")
  911.   (c-name "pango_font_find_shaper")
  912.   (return-type "PangoEngineShape*")
  913.   (parameters
  914.     '("PangoLanguage*" "language")
  915.     '("guint32" "ch")
  916.   )
  917. )
  918.  
  919. (define-method get_metrics
  920.   (of-object "PangoFont")
  921.   (c-name "pango_font_get_metrics")
  922.   (return-type "PangoFontMetrics*")
  923.   (parameters
  924.     '("PangoLanguage*" "language" (null-ok) (default "NULL"))
  925.   )
  926. )
  927.  
  928. (define-method get_glyph_extents
  929.   (of-object "PangoFont")
  930.   (c-name "pango_font_get_glyph_extents")
  931.   (return-type "none")
  932.   (parameters
  933.     '("PangoGlyph" "glyph")
  934.     '("PangoRectangle*" "ink_rect")
  935.     '("PangoRectangle*" "logical_rect")
  936.   )
  937. )
  938.  
  939.  
  940.  
  941. ;; From /opt/gtk2/include/pango-1.0/pango/pango-fontmap.h
  942.  
  943. (define-method load_font
  944.   (of-object "PangoFontMap")
  945.   (c-name "pango_font_map_load_font")
  946.   (return-type "PangoFont*")
  947.   (parameters
  948.     '("PangoContext*" "context")
  949.     '("const-PangoFontDescription*" "desc")
  950.   )
  951. )
  952.  
  953. (define-method load_fontset
  954.   (of-object "PangoFontMap")
  955.   (c-name "pango_font_map_load_fontset")
  956.   (return-type "PangoFontset*")
  957.   (parameters
  958.     '("PangoContext*" "context")
  959.     '("const-PangoFontDescription*" "desc")
  960.     '("PangoLanguage*" "language")
  961.   )
  962. )
  963.  
  964. (define-method list_families
  965.   (of-object "PangoFontMap")
  966.   (c-name "pango_font_map_list_families")
  967.   (return-type "none")
  968.   (parameters
  969.     '("PangoFontFamily***" "families")
  970.     '("int*" "n_families")
  971.   )
  972. )
  973.  
  974. (define-method get_shape_engine_type
  975.   (of-object "PangoFontMap")
  976.   (c-name "pango_font_map_get_shape_engine_type")
  977.   (return-type "const-char*")
  978. )
  979.  
  980.  
  981.  
  982. ;; From /opt/gtk2/include/pango-1.0/pango/pango-fontset.h
  983.  
  984. (define-method get_font
  985.   (of-object "PangoFontset")
  986.   (c-name "pango_fontset_get_font")
  987.   (return-type "PangoFont*")
  988.   (parameters
  989.     '("guint" "wc")
  990.   )
  991. )
  992.  
  993. (define-method get_metrics
  994.   (of-object "PangoFontset")
  995.   (c-name "pango_fontset_get_metrics")
  996.   (return-type "PangoFontMetrics*")
  997. )
  998.  
  999. (define-method foreach
  1000.   (of-object "PangoFontset")
  1001.   (c-name "pango_fontset_foreach")
  1002.   (return-type "none")
  1003.   (parameters
  1004.     '("PangoFontSetForeachFunc" "func")
  1005.     '("gpointer" "data")
  1006.   )
  1007. )
  1008.  
  1009. (define-function pango_fontset_simple_new
  1010.   (c-name "pango_fontset_simple_new")
  1011.   (is-constructor-of "PangoFontsetSimple")
  1012.   (return-type "PangoFontsetSimple*")
  1013.   (parameters
  1014.     '("PangoLanguage*" "language")
  1015.   )
  1016. )
  1017.  
  1018. (define-method append
  1019.   (of-object "PangoFontsetSimple")
  1020.   (c-name "pango_fontset_simple_append")
  1021.   (return-type "none")
  1022.   (parameters
  1023.     '("PangoFont*" "font")
  1024.   )
  1025. )
  1026.  
  1027. (define-method size
  1028.   (of-object "PangoFontsetSimple")
  1029.   (c-name "pango_fontset_simple_size")
  1030.   (return-type "int")
  1031. )
  1032.  
  1033.  
  1034.  
  1035. ;; From /opt/gtk2/include/pango-1.0/pango/pango-glyph.h
  1036.  
  1037. (define-function pango_glyph_string_new
  1038.   (c-name "pango_glyph_string_new")
  1039.   (is-constructor-of "PangoGlyphString")
  1040.   (return-type "PangoGlyphString*")
  1041. )
  1042.  
  1043. (define-method set_size
  1044.   (of-object "PangoGlyphString")
  1045.   (c-name "pango_glyph_string_set_size")
  1046.   (return-type "none")
  1047.   (parameters
  1048.     '("gint" "new_len")
  1049.   )
  1050. )
  1051.  
  1052. (define-function pango_glyph_string_get_type
  1053.   (c-name "pango_glyph_string_get_type")
  1054.   (return-type "GType")
  1055. )
  1056.  
  1057. (define-method copy
  1058.   (of-object "PangoGlyphString")
  1059.   (c-name "pango_glyph_string_copy")
  1060.   (return-type "PangoGlyphString*")
  1061. )
  1062.  
  1063. (define-method free
  1064.   (of-object "PangoGlyphString")
  1065.   (c-name "pango_glyph_string_free")
  1066.   (return-type "none")
  1067. )
  1068.  
  1069. (define-method extents
  1070.   (of-object "PangoGlyphString")
  1071.   (c-name "pango_glyph_string_extents")
  1072.   (return-type "none")
  1073.   (parameters
  1074.     '("PangoFont*" "font")
  1075.     '("PangoRectangle*" "ink_rect")
  1076.     '("PangoRectangle*" "logical_rect")
  1077.   )
  1078. )
  1079.  
  1080. (define-method extents_range
  1081.   (of-object "PangoGlyphString")
  1082.   (c-name "pango_glyph_string_extents_range")
  1083.   (return-type "none")
  1084.   (parameters
  1085.     '("int" "start")
  1086.     '("int" "end")
  1087.     '("PangoFont*" "font")
  1088.     '("PangoRectangle*" "ink_rect")
  1089.     '("PangoRectangle*" "logical_rect")
  1090.   )
  1091. )
  1092.  
  1093. (define-method get_logical_widths
  1094.   (of-object "PangoGlyphString")
  1095.   (c-name "pango_glyph_string_get_logical_widths")
  1096.   (return-type "none")
  1097.   (parameters
  1098.     '("const-char*" "text")
  1099.     '("int" "length")
  1100.     '("int" "embedding_level")
  1101.     '("int*" "logical_widths")
  1102.   )
  1103. )
  1104.  
  1105. (define-method index_to_x
  1106.   (of-object "PangoGlyphString")
  1107.   (c-name "pango_glyph_string_index_to_x")
  1108.   (return-type "none")
  1109.   (parameters
  1110.     '("char*" "text")
  1111.     '("int" "length")
  1112.     '("PangoAnalysis*" "analysis")
  1113.     '("int" "index")
  1114.     '("gboolean" "trailing")
  1115.     '("int*" "x_pos")
  1116.   )
  1117. )
  1118.  
  1119. (define-method x_to_index
  1120.   (of-object "PangoGlyphString")
  1121.   (c-name "pango_glyph_string_x_to_index")
  1122.   (return-type "none")
  1123.   (parameters
  1124.     '("char*" "text")
  1125.     '("int" "length")
  1126.     '("PangoAnalysis*" "analysis")
  1127.     '("int" "x_pos")
  1128.     '("int*" "index")
  1129.     '("int*" "trailing")
  1130.   )
  1131. )
  1132.  
  1133. (define-function shape
  1134.   (c-name "pango_shape")
  1135.   (return-type "none")
  1136.   (parameters
  1137.     '("const-gchar*" "text")
  1138.     '("gint" "length")
  1139.     '("PangoAnalysis*" "analysis")
  1140.     '("PangoGlyphString*" "glyphs")
  1141.   )
  1142. )
  1143.  
  1144. (define-function reorder_items
  1145.   (c-name "pango_reorder_items")
  1146.   (return-type "GList*")
  1147.   (parameters
  1148.     '("GList*" "logical_items")
  1149.   )
  1150. )
  1151.  
  1152.  
  1153.  
  1154. ;; From /opt/gtk2/include/pango-1.0/pango/pango-layout.h
  1155.  
  1156. (define-function pango_layout_get_type
  1157.   (c-name "pango_layout_get_type")
  1158.   (return-type "GType")
  1159. )
  1160.  
  1161. (define-function pango_layout_new
  1162.   (c-name "pango_layout_new")
  1163.   (is-constructor-of "PangoLayout")
  1164.   (return-type "PangoLayout*")
  1165.   (parameters
  1166.     '("PangoContext*" "context")
  1167.   )
  1168. )
  1169.  
  1170. (define-method copy
  1171.   (of-object "PangoLayout")
  1172.   (c-name "pango_layout_copy")
  1173.   (return-type "PangoLayout*")
  1174. )
  1175.  
  1176. (define-method get_context
  1177.   (of-object "PangoLayout")
  1178.   (c-name "pango_layout_get_context")
  1179.   (return-type "PangoContext*")
  1180. )
  1181.  
  1182. (define-method set_attributes
  1183.   (of-object "PangoLayout")
  1184.   (c-name "pango_layout_set_attributes")
  1185.   (return-type "none")
  1186.   (parameters
  1187.     '("PangoAttrList*" "attrs")
  1188.   )
  1189. )
  1190.  
  1191. (define-method get_attributes
  1192.   (of-object "PangoLayout")
  1193.   (c-name "pango_layout_get_attributes")
  1194.   (return-type "PangoAttrList*")
  1195. )
  1196.  
  1197. (define-method set_text
  1198.   (of-object "PangoLayout")
  1199.   (c-name "pango_layout_set_text")
  1200.   (return-type "none")
  1201.   (parameters
  1202.     '("const-char*" "text")
  1203.     '("int" "length")
  1204.   )
  1205. )
  1206.  
  1207. (define-method get_text
  1208.   (of-object "PangoLayout")
  1209.   (c-name "pango_layout_get_text")
  1210.   (return-type "const-char*")
  1211. )
  1212.  
  1213. (define-method set_markup
  1214.   (of-object "PangoLayout")
  1215.   (c-name "pango_layout_set_markup")
  1216.   (return-type "none")
  1217.   (parameters
  1218.     '("const-char*" "markup")
  1219.     '("int" "length")
  1220.   )
  1221. )
  1222.  
  1223. (define-method set_markup_with_accel
  1224.   (of-object "PangoLayout")
  1225.   (c-name "pango_layout_set_markup_with_accel")
  1226.   (return-type "none")
  1227.   (parameters
  1228.     '("const-char*" "markup")
  1229.     '("int" "length")
  1230.     '("gunichar" "accel_marker")
  1231.     '("gunichar*" "accel_char")
  1232.   )
  1233. )
  1234.  
  1235. (define-method set_font_description
  1236.   (of-object "PangoLayout")
  1237.   (c-name "pango_layout_set_font_description")
  1238.   (return-type "none")
  1239.   (parameters
  1240.     '("const-PangoFontDescription*" "desc" (null-ok))
  1241.   )
  1242. )
  1243.  
  1244. (define-method set_width
  1245.   (of-object "PangoLayout")
  1246.   (c-name "pango_layout_set_width")
  1247.   (return-type "none")
  1248.   (parameters
  1249.     '("int" "width")
  1250.   )
  1251. )
  1252.  
  1253. (define-method get_width
  1254.   (of-object "PangoLayout")
  1255.   (c-name "pango_layout_get_width")
  1256.   (return-type "int")
  1257. )
  1258.  
  1259. (define-method set_wrap
  1260.   (of-object "PangoLayout")
  1261.   (c-name "pango_layout_set_wrap")
  1262.   (return-type "none")
  1263.   (parameters
  1264.     '("PangoWrapMode" "wrap")
  1265.   )
  1266. )
  1267.  
  1268. (define-method get_wrap
  1269.   (of-object "PangoLayout")
  1270.   (c-name "pango_layout_get_wrap")
  1271.   (return-type "PangoWrapMode")
  1272. )
  1273.  
  1274. (define-method set_indent
  1275.   (of-object "PangoLayout")
  1276.   (c-name "pango_layout_set_indent")
  1277.   (return-type "none")
  1278.   (parameters
  1279.     '("int" "indent")
  1280.   )
  1281. )
  1282.  
  1283. (define-method get_indent
  1284.   (of-object "PangoLayout")
  1285.   (c-name "pango_layout_get_indent")
  1286.   (return-type "int")
  1287. )
  1288.  
  1289. (define-method set_spacing
  1290.   (of-object "PangoLayout")
  1291.   (c-name "pango_layout_set_spacing")
  1292.   (return-type "none")
  1293.   (parameters
  1294.     '("int" "spacing")
  1295.   )
  1296. )
  1297.  
  1298. (define-method get_spacing
  1299.   (of-object "PangoLayout")
  1300.   (c-name "pango_layout_get_spacing")
  1301.   (return-type "int")
  1302. )
  1303.  
  1304. (define-method set_justify
  1305.   (of-object "PangoLayout")
  1306.   (c-name "pango_layout_set_justify")
  1307.   (return-type "none")
  1308.   (parameters
  1309.     '("gboolean" "justify")
  1310.   )
  1311. )
  1312.  
  1313. (define-method get_justify
  1314.   (of-object "PangoLayout")
  1315.   (c-name "pango_layout_get_justify")
  1316.   (return-type "gboolean")
  1317. )
  1318.  
  1319. (define-method set_auto_dir
  1320.   (of-object "PangoLayout")
  1321.   (c-name "pango_layout_set_auto_dir")
  1322.   (return-type "none")
  1323.   (parameters
  1324.     '("gboolean" "auto_dir")
  1325.   )
  1326. )
  1327.  
  1328. (define-method get_auto_dir
  1329.   (of-object "PangoLayout")
  1330.   (c-name "pango_layout_get_auto_dir")
  1331.   (return-type "gboolean")
  1332. )
  1333.  
  1334. (define-method set_alignment
  1335.   (of-object "PangoLayout")
  1336.   (c-name "pango_layout_set_alignment")
  1337.   (return-type "none")
  1338.   (parameters
  1339.     '("PangoAlignment" "alignment")
  1340.   )
  1341. )
  1342.  
  1343. (define-method get_alignment
  1344.   (of-object "PangoLayout")
  1345.   (c-name "pango_layout_get_alignment")
  1346.   (return-type "PangoAlignment")
  1347. )
  1348.  
  1349. (define-method set_tabs
  1350.   (of-object "PangoLayout")
  1351.   (c-name "pango_layout_set_tabs")
  1352.   (return-type "none")
  1353.   (parameters
  1354.     '("PangoTabArray*" "tabs" (null-ok))
  1355.   )
  1356. )
  1357.  
  1358. (define-method get_tabs
  1359.   (of-object "PangoLayout")
  1360.   (c-name "pango_layout_get_tabs")
  1361.   (return-type "PangoTabArray*")
  1362. )
  1363.  
  1364. (define-method set_single_paragraph_mode
  1365.   (of-object "PangoLayout")
  1366.   (c-name "pango_layout_set_single_paragraph_mode")
  1367.   (return-type "none")
  1368.   (parameters
  1369.     '("gboolean" "setting")
  1370.   )
  1371. )
  1372.  
  1373. (define-method get_single_paragraph_mode
  1374.   (of-object "PangoLayout")
  1375.   (c-name "pango_layout_get_single_paragraph_mode")
  1376.   (return-type "gboolean")
  1377. )
  1378.  
  1379. (define-method context_changed
  1380.   (of-object "PangoLayout")
  1381.   (c-name "pango_layout_context_changed")
  1382.   (return-type "none")
  1383. )
  1384.  
  1385. (define-method get_log_attrs
  1386.   (of-object "PangoLayout")
  1387.   (c-name "pango_layout_get_log_attrs")
  1388.   (return-type "none")
  1389.   (parameters
  1390.     '("PangoLogAttr**" "attrs")
  1391.     '("gint*" "n_attrs")
  1392.   )
  1393. )
  1394.  
  1395. (define-method index_to_pos
  1396.   (of-object "PangoLayout")
  1397.   (c-name "pango_layout_index_to_pos")
  1398.   (return-type "none")
  1399.   (parameters
  1400.     '("int" "index")
  1401.     '("PangoRectangle*" "pos")
  1402.   )
  1403. )
  1404.  
  1405. (define-method get_cursor_pos
  1406.   (of-object "PangoLayout")
  1407.   (c-name "pango_layout_get_cursor_pos")
  1408.   (return-type "none")
  1409.   (parameters
  1410.     '("int" "index")
  1411.     '("PangoRectangle*" "strong_pos")
  1412.     '("PangoRectangle*" "weak_pos")
  1413.   )
  1414. )
  1415.  
  1416. (define-method move_cursor_visually
  1417.   (of-object "PangoLayout")
  1418.   (c-name "pango_layout_move_cursor_visually")
  1419.   (return-type "none")
  1420.   (parameters
  1421.     '("gboolean" "strong")
  1422.     '("int" "old_index")
  1423.     '("int" "old_trailing")
  1424.     '("int" "direction")
  1425.     '("int*" "new_index")
  1426.     '("int*" "new_trailing")
  1427.   )
  1428. )
  1429.  
  1430. (define-method xy_to_index
  1431.   (of-object "PangoLayout")
  1432.   (c-name "pango_layout_xy_to_index")
  1433.   (return-type "gboolean")
  1434.   (parameters
  1435.     '("int" "x")
  1436.     '("int" "y")
  1437.     '("int*" "index")
  1438.     '("int*" "trailing")
  1439.   )
  1440. )
  1441.  
  1442. (define-method get_extents
  1443.   (of-object "PangoLayout")
  1444.   (c-name "pango_layout_get_extents")
  1445.   (return-type "none")
  1446.   (parameters
  1447.     '("PangoRectangle*" "ink_rect")
  1448.     '("PangoRectangle*" "logical_rect")
  1449.   )
  1450. )
  1451.  
  1452. (define-method get_pixel_extents
  1453.   (of-object "PangoLayout")
  1454.   (c-name "pango_layout_get_pixel_extents")
  1455.   (return-type "none")
  1456.   (parameters
  1457.     '("PangoRectangle*" "ink_rect")
  1458.     '("PangoRectangle*" "logical_rect")
  1459.   )
  1460. )
  1461.  
  1462. (define-method get_size
  1463.   (of-object "PangoLayout")
  1464.   (c-name "pango_layout_get_size")
  1465.   (return-type "none")
  1466.   (parameters
  1467.     '("int*" "width")
  1468.     '("int*" "height")
  1469.   )
  1470. )
  1471.  
  1472. (define-method get_pixel_size
  1473.   (of-object "PangoLayout")
  1474.   (c-name "pango_layout_get_pixel_size")
  1475.   (return-type "none")
  1476.   (parameters
  1477.     '("int*" "width")
  1478.     '("int*" "height")
  1479.   )
  1480. )
  1481.  
  1482. (define-method get_line_count
  1483.   (of-object "PangoLayout")
  1484.   (c-name "pango_layout_get_line_count")
  1485.   (return-type "int")
  1486. )
  1487.  
  1488. (define-method get_line
  1489.   (of-object "PangoLayout")
  1490.   (c-name "pango_layout_get_line")
  1491.   (return-type "PangoLayoutLine*")
  1492.   (parameters
  1493.     '("int" "line")
  1494.   )
  1495. )
  1496.  
  1497. (define-method get_lines
  1498.   (of-object "PangoLayout")
  1499.   (c-name "pango_layout_get_lines")
  1500.   (return-type "GSList*")
  1501. )
  1502.  
  1503. (define-method ref
  1504.   (of-object "PangoLayoutLine")
  1505.   (c-name "pango_layout_line_ref")
  1506.   (return-type "none")
  1507. )
  1508.  
  1509. (define-method unref
  1510.   (of-object "PangoLayoutLine")
  1511.   (c-name "pango_layout_line_unref")
  1512.   (return-type "none")
  1513. )
  1514.  
  1515. (define-method x_to_index
  1516.   (of-object "PangoLayoutLine")
  1517.   (c-name "pango_layout_line_x_to_index")
  1518.   (return-type "gboolean")
  1519.   (parameters
  1520.     '("int" "x_pos")
  1521.     '("int*" "index")
  1522.     '("int*" "trailing")
  1523.   )
  1524. )
  1525.  
  1526. (define-method index_to_x
  1527.   (of-object "PangoLayoutLine")
  1528.   (c-name "pango_layout_line_index_to_x")
  1529.   (return-type "none")
  1530.   (parameters
  1531.     '("int" "index")
  1532.     '("gboolean" "trailing")
  1533.     '("int*" "x_pos")
  1534.   )
  1535. )
  1536.  
  1537. (define-method get_x_ranges
  1538.   (of-object "PangoLayoutLine")
  1539.   (c-name "pango_layout_line_get_x_ranges")
  1540.   (return-type "none")
  1541.   (parameters
  1542.     '("int" "start_index")
  1543.     '("int" "end_index")
  1544.     '("int**" "ranges")
  1545.     '("int*" "n_ranges")
  1546.   )
  1547. )
  1548.  
  1549. (define-method get_extents
  1550.   (of-object "PangoLayoutLine")
  1551.   (c-name "pango_layout_line_get_extents")
  1552.   (return-type "none")
  1553.   (parameters
  1554.     '("PangoRectangle*" "ink_rect")
  1555.     '("PangoRectangle*" "logical_rect")
  1556.   )
  1557. )
  1558.  
  1559. (define-method get_pixel_extents
  1560.   (of-object "PangoLayoutLine")
  1561.   (c-name "pango_layout_line_get_pixel_extents")
  1562.   (return-type "none")
  1563.   (parameters
  1564.     '("PangoRectangle*" "ink_rect")
  1565.     '("PangoRectangle*" "logical_rect")
  1566.   )
  1567. )
  1568.  
  1569. (define-function pango_layout_iter_get_type
  1570.   (c-name "pango_layout_iter_get_type")
  1571.   (return-type "GType")
  1572. )
  1573.  
  1574. (define-method get_iter
  1575.   (of-object "PangoLayout")
  1576.   (c-name "pango_layout_get_iter")
  1577.   (return-type "PangoLayoutIter*")
  1578. )
  1579.  
  1580. (define-method free
  1581.   (of-object "PangoLayoutIter")
  1582.   (c-name "pango_layout_iter_free")
  1583.   (return-type "none")
  1584. )
  1585.  
  1586. (define-method get_index
  1587.   (of-object "PangoLayoutIter")
  1588.   (c-name "pango_layout_iter_get_index")
  1589.   (return-type "int")
  1590. )
  1591.  
  1592. (define-method get_run
  1593.   (of-object "PangoLayoutIter")
  1594.   (c-name "pango_layout_iter_get_run")
  1595.   (return-type "PangoLayoutRun*")
  1596. )
  1597.  
  1598. (define-method get_line
  1599.   (of-object "PangoLayoutIter")
  1600.   (c-name "pango_layout_iter_get_line")
  1601.   (return-type "PangoLayoutLine*")
  1602. )
  1603.  
  1604. (define-method at_last_line
  1605.   (of-object "PangoLayoutIter")
  1606.   (c-name "pango_layout_iter_at_last_line")
  1607.   (return-type "gboolean")
  1608. )
  1609.  
  1610. (define-method next_char
  1611.   (of-object "PangoLayoutIter")
  1612.   (c-name "pango_layout_iter_next_char")
  1613.   (return-type "gboolean")
  1614. )
  1615.  
  1616. (define-method next_cluster
  1617.   (of-object "PangoLayoutIter")
  1618.   (c-name "pango_layout_iter_next_cluster")
  1619.   (return-type "gboolean")
  1620. )
  1621.  
  1622. (define-method next_run
  1623.   (of-object "PangoLayoutIter")
  1624.   (c-name "pango_layout_iter_next_run")
  1625.   (return-type "gboolean")
  1626. )
  1627.  
  1628. (define-method next_line
  1629.   (of-object "PangoLayoutIter")
  1630.   (c-name "pango_layout_iter_next_line")
  1631.   (return-type "gboolean")
  1632. )
  1633.  
  1634. (define-method get_char_extents
  1635.   (of-object "PangoLayoutIter")
  1636.   (c-name "pango_layout_iter_get_char_extents")
  1637.   (return-type "none")
  1638.   (parameters
  1639.     '("PangoRectangle*" "logical_rect")
  1640.   )
  1641. )
  1642.  
  1643. (define-method get_cluster_extents
  1644.   (of-object "PangoLayoutIter")
  1645.   (c-name "pango_layout_iter_get_cluster_extents")
  1646.   (return-type "none")
  1647.   (parameters
  1648.     '("PangoRectangle*" "ink_rect")
  1649.     '("PangoRectangle*" "logical_rect")
  1650.   )
  1651. )
  1652.  
  1653. (define-method get_run_extents
  1654.   (of-object "PangoLayoutIter")
  1655.   (c-name "pango_layout_iter_get_run_extents")
  1656.   (return-type "none")
  1657.   (parameters
  1658.     '("PangoRectangle*" "ink_rect")
  1659.     '("PangoRectangle*" "logical_rect")
  1660.   )
  1661. )
  1662.  
  1663. (define-method get_line_extents
  1664.   (of-object "PangoLayoutIter")
  1665.   (c-name "pango_layout_iter_get_line_extents")
  1666.   (return-type "none")
  1667.   (parameters
  1668.     '("PangoRectangle*" "ink_rect")
  1669.     '("PangoRectangle*" "logical_rect")
  1670.   )
  1671. )
  1672.  
  1673. (define-method get_line_yrange
  1674.   (of-object "PangoLayoutIter")
  1675.   (c-name "pango_layout_iter_get_line_yrange")
  1676.   (return-type "none")
  1677.   (parameters
  1678.     '("int*" "y0")
  1679.     '("int*" "y1")
  1680.   )
  1681. )
  1682.  
  1683. (define-method get_layout_extents
  1684.   (of-object "PangoLayoutIter")
  1685.   (c-name "pango_layout_iter_get_layout_extents")
  1686.   (return-type "none")
  1687.   (parameters
  1688.     '("PangoRectangle*" "ink_rect")
  1689.     '("PangoRectangle*" "logical_rect")
  1690.   )
  1691. )
  1692.  
  1693. (define-method get_baseline
  1694.   (of-object "PangoLayoutIter")
  1695.   (c-name "pango_layout_iter_get_baseline")
  1696.   (return-type "int")
  1697. )
  1698.  
  1699.  
  1700. ;; From /opt/gtk2/include/pango-1.0/pango/pango-tabs.h
  1701.  
  1702. (define-function pango_tab_array_new
  1703.   (c-name "pango_tab_array_new")
  1704.   (is-constructor-of "PangoTabArray")
  1705.   (return-type "PangoTabArray*")
  1706.   (parameters
  1707.     '("gint" "initial_size")
  1708.     '("gboolean" "positions_in_pixels")
  1709.   )
  1710. )
  1711.  
  1712. (define-function pango_tab_array_new_with_positions
  1713.   (c-name "pango_tab_array_new_with_positions")
  1714.   (is-constructor-of "PangoTabArray")
  1715.   (return-type "PangoTabArray*")
  1716.   (parameters
  1717.     '("gint" "size")
  1718.     '("gboolean" "positions_in_pixels")
  1719.     '("PangoTabAlign" "first_alignment")
  1720.     '("gint" "first_position")
  1721.   )
  1722.   (varargs #t)
  1723. )
  1724.  
  1725. (define-function pango_tab_array_get_type
  1726.   (c-name "pango_tab_array_get_type")
  1727.   (return-type "GType")
  1728. )
  1729.  
  1730. (define-method copy
  1731.   (of-object "PangoTabArray")
  1732.   (c-name "pango_tab_array_copy")
  1733.   (return-type "PangoTabArray*")
  1734. )
  1735.  
  1736. (define-method free
  1737.   (of-object "PangoTabArray")
  1738.   (c-name "pango_tab_array_free")
  1739.   (return-type "none")
  1740. )
  1741.  
  1742. (define-method get_size
  1743.   (of-object "PangoTabArray")
  1744.   (c-name "pango_tab_array_get_size")
  1745.   (return-type "gint")
  1746. )
  1747.  
  1748. (define-method resize
  1749.   (of-object "PangoTabArray")
  1750.   (c-name "pango_tab_array_resize")
  1751.   (return-type "none")
  1752.   (parameters
  1753.     '("gint" "new_size")
  1754.   )
  1755. )
  1756.  
  1757. (define-method set_tab
  1758.   (of-object "PangoTabArray")
  1759.   (c-name "pango_tab_array_set_tab")
  1760.   (return-type "none")
  1761.   (parameters
  1762.     '("gint" "tab_index")
  1763.     '("PangoTabAlign" "alignment")
  1764.     '("gint" "location")
  1765.   )
  1766. )
  1767.  
  1768. (define-method get_tab
  1769.   (of-object "PangoTabArray")
  1770.   (c-name "pango_tab_array_get_tab")
  1771.   (return-type "none")
  1772.   (parameters
  1773.     '("gint" "tab_index")
  1774.     '("PangoTabAlign*" "alignment")
  1775.     '("gint*" "location")
  1776.   )
  1777. )
  1778.  
  1779. (define-method get_tabs
  1780.   (of-object "PangoTabArray")
  1781.   (c-name "pango_tab_array_get_tabs")
  1782.   (return-type "none")
  1783.   (parameters
  1784.     '("PangoTabAlign**" "alignments")
  1785.     '("gint**" "locations")
  1786.   )
  1787. )
  1788.  
  1789. (define-method get_positions_in_pixels
  1790.   (of-object "PangoTabArray")
  1791.   (c-name "pango_tab_array_get_positions_in_pixels")
  1792.   (return-type "gboolean")
  1793. )
  1794.  
  1795.  
  1796.  
  1797. ;; From /opt/gtk2/include/pango-1.0/pango/pango-types.h
  1798.  
  1799. (define-function pango_language_from_string
  1800.   (is-constructor-of "PangoLanguage")
  1801.   (c-name "pango_language_from_string")
  1802.   (return-type "PangoLanguage*")
  1803.   (parameters
  1804.     '("const-char*" "language")
  1805.   )
  1806. )
  1807.  
  1808. (define-function pango_language_from_string
  1809.   (c-name "pango_language_from_string1")
  1810.   (return-type "PangoLanguage*")
  1811.   (parameters
  1812.     '("const-char*" "language")
  1813.   )
  1814.   (deprecated "use pango.Language instead")
  1815. )
  1816.  
  1817. (define-function pango_language_matches
  1818.   (c-name "pango_language_matches1")
  1819.   (return-type "gboolean")
  1820.   (parameters
  1821.     '("PangoLanguage*" "language" (null-ok))
  1822.     '("const-char*" "range_list")
  1823.   )
  1824.   (deprecated "use pango.Language.matches instead")
  1825. )
  1826.  
  1827. (define-method matches
  1828.   (of-object "PangoLanguage")
  1829.   (c-name "pango_language_matches")
  1830.   (return-type "gboolean")
  1831.   (parameters
  1832.     '("const-char*" "range_list")
  1833.   )
  1834. )
  1835.  
  1836. (define-method to_string
  1837.   (of-object "PangoLanguage")
  1838.   (c-name "pango_language_to_string")
  1839.   (return-type "const-char*")
  1840. )
  1841.  
  1842. (define-function PIXELS
  1843.   (c-name "PANGO_PIXELS")
  1844.   (return-type "gint")
  1845.   (parameters
  1846.     '("gint" "size")
  1847.    )
  1848.  )
  1849.  
  1850. (define-function ASCENT
  1851.   (c-name "PANGO_ASCENT")
  1852.   (return-type "gint")
  1853.   (parameters
  1854.     '("PangoRectangle" "rect")
  1855.    )
  1856.  )
  1857.  
  1858. (define-function DESCENT
  1859.   (c-name "PANGO_DESCENT")
  1860.   (return-type "gint")
  1861.   (parameters
  1862.     '("PangoRectangle" "rect")
  1863.    )
  1864.  )
  1865.  
  1866. (define-function LBEARING
  1867.   (c-name "PANGO_LBEARING")
  1868.   (return-type "gint")
  1869.   (parameters
  1870.     '("PangoRectangle" "rect")
  1871.    )
  1872.  )
  1873.  
  1874. (define-function RBEARING
  1875.   (c-name "PANGO_RBEARING")
  1876.   (return-type "gint")
  1877.   (parameters
  1878.     '("PangoRectangle" "rect")
  1879.    )
  1880.  )
  1881.